home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Deutsche Edition 1
/
Deutsche Edition 1.iso
/
amok
/
011-020
/
amok20
/
complexlib
/
txt
/
complexinout.def
next >
Wrap
Text File
|
1993-11-04
|
926b
|
33 lines
(*********************************************************************
:Program. ComplexInOut.def
:Author. Gary Struhlik
:Address. -
:Phone. -
:shortcut. [gs]
:Version. 1.0
:Date. 22.10.1988
:Copyright. PD
:Language. Modula-II
:Translator. M2Amiga
:Imports. ComplexLib [gs]
:UpDate. -
:Contents. Ein- Ausgabe für komplexe Zahlen
:Remark. Für den Amiga Modula-2 Klub / Stuttgart
:Remark. Am 01.01.1989 mit M2Amiga 3.2d neu kompiliert
**********************************************************************)
DEFINITION MODULE ComplexInOut;
FROM ComplexLib IMPORT COMPLEX;
PROCEDURE WriteComplex( A : COMPLEX; m,n : INTEGER; expo,pol : BOOLEAN);
PROCEDURE ReadComplex( VAR A : COMPLEX; pol : BOOLEAN);
PROCEDURE WriteReal( x : REAL; m,n : INTEGER; expo : BOOLEAN);
PROCEDURE ReadReal( VAR x : REAL);
END ComplexInOut.